object dmDadosImpr: TdmDadosImpr
  OldCreateOrder = False
  OnCreate = DataModuleCreate
  Left = 362
  Top = 147
  Height = 397
  Width = 502
  object sqlTblcif: TSQLDataSet
    CommandText = 'select *'#13#10'from tblcif'
    DbxCommandType = 'Dbx.SQL'
    MaxBlobSize = -1
    Params = <>
    SQLConnection = dmConexao.SQLConnection
    Left = 232
    Top = 56
  end
  object dspTblcif: TDataSetProvider
    DataSet = sqlTblcif
    UpdateMode = upWhereKeyOnly
    OnUpdateError = dspTblcifUpdateError
    Left = 232
    Top = 112
  end
  object cdsTblcif: TClientDataSet
    Aggregates = <>
    Params = <>
    ProviderName = 'dspTblcif'
    AfterInsert = cdsTblcifAfterInsert
    Left = 232
    Top = 168
    object cdsTblcifcifmodel: TStringField
      FieldName = 'cifmodel'
      ProviderFlags = [pfInUpdate, pfInWhere, pfInKey]
      Required = True
      OnValidate = cdsTblcifcifmodelValidate
    end
    object cdsTblcifcifporta: TStringField
      FieldName = 'cifporta'
      Required = True
      OnValidate = cdsTblcifcifportaValidate
      Size = 30
    end
    object cdsTblcifcifativarlogimpr: TShortintField
      FieldName = 'cifativarlogimpr'
      Required = True
    end
  end
  object ACBrECF: TACBrECF
    Porta = 'COM1'
    ReTentar = False
    IntervaloAposComando = 50
    MsgAguarde = 'Aguardando a resposta da Impressora: %d segundos'
    MsgTrabalhando = 'Impressora est'#225' trabalhando'
    ExibeMensagem = False
    BloqueiaMouseTeclado = False
    MsgRelatorio = 'Imprimindo %s  %d'#170' Via '
    MsgPausaRelatorio = 'Destaque a %d'#170' via, <ENTER> proxima, %d seg.'
    PaginaDeCodigo = 0
    FormMsgFonte.Charset = DEFAULT_CHARSET
    FormMsgFonte.Color = clWindowText
    FormMsgFonte.Height = -16
    FormMsgFonte.Name = 'Tahoma'
    FormMsgFonte.Pitch = fpVariable
    FormMsgFonte.Style = []
    FormMsgColor = clHighlight
    OnMsgAguarde = ACBrECFMsgAguarde
    OnAguardandoRespostaChange = ACBrECFAguardandoRespostaChange
    OnChangeEstado = ACBrECFChangeEstado
    DecimaisPreco = 2
    DecimaisQtd = 0
    MemoParams.Strings = (
      '[Cabecalho]'
      'LIN000=<center><b>Nome da Empresa</b></center>'
      'LIN001=<center>Nome da Rua , 1234  -  Bairro</center>'
      'LIN002=<center>Cidade  -  UF  -  99999-999</center>'
      
        'LIN003=<center>CNPJ: 01.234.567/0001-22    IE: 012.345.678.90</c' +
        'enter>'
      
        'LIN004=<table width=100%><tr><td align=left><code>Data</code> <c' +
        'ode>Hora</code></td><td align=right>COO: <b><code>NumCupom</code' +
        '></b></td></tr></table>'
      'LIN005=<hr>'
      ' '
      '[Cabecalho_Item]'
      'LIN000=ITEM   CODIGO      DESCRICAO'
      'LIN001=QTD         x UNITARIO       Aliq     VALOR (R$)'
      'LIN002=<hr>'
      
        'MascaraItem=III CCCCCCCCCCCCCC DDDDDDDDDDDDDDDDDDDDDDDDDDDDDQQQQ' +
        'QQQQ UU x VVVVVVVVVVVVV AAAAAA TTTTTTTTTTTTT'
      ' '
      '[Rodape]'
      'LIN000=<hr>'
      
        'LIN001=<table width=100%><tr><td align=left><code>Data</code> <c' +
        'ode>Hora</code></td><td align=right>Projeto ACBr: <b><code>ACBR<' +
        '/code></b></td></tr></table>'
      'LIN002=<center>Obrigado Volte Sempre</center>'
      'LIN003=<hr>'
      ' '
      '[Formato]'
      'Colunas=48'
      'HTML=1'
      'HTML_Title_Size=2'
      'HTML_Font=<font size="2" face="Lucida Console">')
    Device.HandShake = hsDTR_DSR
    ConfigBarras.MostrarCodigo = True
    ConfigBarras.LarguraLinha = 3
    ConfigBarras.Altura = 10
    Left = 80
    Top = 104
  end
end
